home *** CD-ROM | disk | FTP | other *** search
/ MacTech 1 to 12 / MacTech-vol-1-12.toast / Source / MacTech® Magazine / Volume 09 - 1993 / 09.08 Aug 93 / Other AppleScript Samples / Script Application Examples / Quit handler example 1.txt < prev    next >
Encoding:
Text File  |  1993-07-02  |  322 b   |  9 lines  |  [TEXT/ToyS]
  1. on quit
  2.     display dialog "Are you sure you want to quit this script?" ¬
  3.         with icon stop buttons {"Cancel", "Quit"} ¬
  4.         default button "Quit"
  5.     --If the user presses Cancel, the script will fail silently,
  6.     --and the application's Quit handler will not run.
  7.     continue quit --This makes the application actually quit
  8. end quit
  9.